home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 1996 September / inter@ivo 1996-09.iso / cybint8 / bin / montracd.dxr / 00156.ls < prev    next >
Encoding:
Text File  |  1996-08-02  |  768 b   |  43 lines
  1. on exitFrame
  2.   global act, act1
  3.   if act = 0 then
  4.     if soundBusy(2) = 0 then
  5.       InVis(27)
  6.     end if
  7.     if rollOver(28) or rollOver(29) then
  8.       cursor([901, 902])
  9.     else
  10.       if rollOver(34) or rollOver(35) then
  11.         cursor([901, 902])
  12.       else
  13.         HotSpots(6, 15)
  14.       end if
  15.     end if
  16.     if rollOver(14) then
  17.       onVis(24)
  18.     else
  19.       InVis(24)
  20.     end if
  21.     if rollOver(15) then
  22.       onVis(25)
  23.     else
  24.       InVis(25)
  25.     end if
  26.   end if
  27.   if act = 1 then
  28.     if rollOver(37) or rollOver(38) then
  29.       cursor([901, 902])
  30.     else
  31.       cursor(-1)
  32.     end if
  33.   end if
  34.   if act1 = 1 then
  35.     if rollOver(34) or rollOver(35) or rollOver(31) then
  36.       cursor([901, 902])
  37.     else
  38.       cursor(-1)
  39.     end if
  40.   end if
  41.   Loopframe()
  42. end
  43.